home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / HARDWARE / IICALARM / !iicAlarm / Tools / !AlarmShut / !Run < prev    next >
Text File  |  1994-05-04  |  697b  |  20 lines
  1. | !Run-File for !AlarmShut 0.30
  2. | Shutdown Computer on user request.
  3. | Difference to !AlarmQuit is that we use the Shutdown
  4. | function of the desktop to cancel all Applikations with
  5. | user query if some data is unsaved.
  6.  
  7. Set AlarmShut$Dir <Obey$Dir>
  8.  
  9. | If the Alarmsystem is active, we set the next Alarm.
  10. IF "<AlarmMode>" <> "" THEN Run <AlarmExt$Dir>.AlarmSet
  11.  
  12. | If this was an automatic start then we may switch off
  13. | without Shutting down the computer !
  14. IF "<AlarmMode>" = "1" THEN Run <AlarmExt$Dir>.SwitchOff
  15.  
  16. | If we are in User-mode, we Shut down gently.
  17. | But only if we are in the desktop.
  18. IF "<Alarm$Desktop>" = "NO" THEN Run <AlarmExt$Dir>.SwitchOff
  19. WimpTask <AlarmShut$Dir>.!RunImage
  20.